home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1999 January: Mac OS SDK / Dev.CD Jan 99 SDK1.toast / Development Kits / AppleScript / AppleScript™ Setup / Language at a Glance / Language at a Glance / stack_-1.xml < prev    next >
Encoding:
Extensible Markup Language  |  1996-01-03  |  17.7 KB  |  189 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
  3. <stack>
  4.     <name>in</name>
  5.     <id>-1</id>
  6.     <cardCount>157</cardCount>
  7.     <cardID>2891</cardID>
  8.     <listID>34904</listID>
  9.     <cantModify><false /></cantModify>
  10.     <cantDelete><false /></cantDelete>
  11.     <cantAbort><false /></cantAbort>
  12.     <cardSize>
  13.         <width>448</width>
  14.         <height>304</height>
  15.     </cardSize>
  16.     <script>================================================================================
  17. Language at a Glance Stack by Scott Bongiorno
  18. ¬© 1993 Apple Computer, Inc. All rights reserved.
  19.  
  20. "HyperCard is alive and well and living in Cupertino"
  21.  
  22. Programmer's Notes:
  23. Before shipping the stack, issue the command "ShipIt" - this will lock
  24. fields, etc. to prepare the stack for end-user use
  25. To Modify the stack, first issue the command "AuthorIt"
  26. ================================================================================
  27.  
  28. on openStack
  29. global gTheSelected, gLastCardInThisStack
  30. put empty into gTheSelected
  31. put empty into gLastCardInThisStack
  32. --  set userLevel to 1
  33. pass openStack
  34. end openStack
  35.  
  36. on closeStack
  37. shipit
  38. end closeStack
  39.  
  40. on closeCard
  41. global gLastCardInThisStack
  42. put the ID of this cd into gLastCardInThisStack
  43. get the short name of this bg
  44. if it <> "contents" and it  <> "about this stack" and it  <> "Glossary" then
  45. if the visible of fld "examples" then
  46. hide fld "examples"
  47. set the name of bg btn "Hide Example" to "Show Example"
  48. end if
  49. end if
  50. end closeCard
  51.  
  52. on goBack
  53. global gLastCardInThisStack
  54. if gLastCardInThisStack ‚↠empty then go gLastCardInThisStack
  55. end goBack
  56.  
  57. on findIt
  58. global gTopic
  59. if gTopic ‚↠"gtopic" then
  60. ask "Find what topic?" with gTopic
  61. else
  62. ask "Find what topic?"
  63. end if
  64. if the result is "Cancel" or it is empty then exit to HyperCard
  65. put it into gTopic
  66. findTopic
  67. end findIt
  68.  
  69. on findTopic
  70. global gTopic
  71. find string gTopic in fld "title"
  72. if the result is not empty then answer the result with "Try Again" or "OK"
  73. if it is "Try Again" then findIt
  74. end findTopic
  75.  
  76. on nextCard
  77. visual wipe left fast
  78. if the number of this cd ‚↠the number of the last cd then go next
  79. end nextCard
  80.  
  81. on prevCard
  82. visual wipe right fast
  83. if the number of this cd ‚↠2 then go prev card
  84. end prevCard
  85.  
  86. on arrowKey theKey
  87. if theKey is "left" then prevCard
  88. if theKey is "right" then nextCard
  89. end arrowKey
  90.  
  91. on goHelp
  92. go cd id 3953
  93. end goHelp
  94.  
  95. on goIndex
  96. go cd id 2891
  97. end goIndex
  98.  
  99. on commandKeyDown theKey
  100. if theKey = "i" and the shiftKey ‚↠down then
  101. goIndex
  102. else if theKey = "f" then
  103. findIt
  104. else if theKey = "g" then
  105. findTopic
  106. else
  107. pass commandKeyDown
  108. end if
  109. end commandKeyDown
  110.  
  111. on findGloss
  112. lock screen
  113. get the clickText
  114. --  find whole it in fld "GlossaryEntries"
  115. find word 1 of it in fld "GlossaryEntries"
  116. end findGloss
  117.  
  118. on showHideExample
  119. get the name of the target
  120. if the short name of it = "Show Example" then
  121. lock screen
  122. show fld "examples"
  123. set the name of it to "Hide Example"
  124. unlock screen with barn door open fast
  125. else
  126. lock screen
  127. hide fld "examples"
  128. set the name of it to "Show Example"
  129. unlock screen with barn door close fast
  130. end if
  131. end showHideExample
  132.  
  133. on ShipIt
  134. -- global gLockFlag
  135. lock screen
  136. push card
  137. -- Lock all fields of all backgrounds
  138. -- put true into gLockFlag
  139. -- repeat with whichBG = 1 to number of bgs
  140. --   go bg whichBG
  141. --   ToggleAllFields
  142. -- end repeat
  143. -- do some special processing for various backgrounds
  144. -- Glossary Background
  145. go bg "Glossary"
  146. hide fld "title"
  147. -- The various "? Commands" backgrounds
  148. go bg "AppleScript‚Ñ¢"
  149. hide bkgnd btn "FindDef"
  150. go bg "Application"
  151. hide bkgnd btn "FindDef"
  152. go bg "Scripting Additions"
  153. hide bkgnd btn "FindDef"
  154. pop card
  155. unlock screen
  156. set cantModify of this stack to false
  157. set cantPeek of this stack to true
  158. put empty into cd fld "topics" of cd 1
  159. --  set userLevel to 1
  160. end ShipIt
  161.  
  162. on AuthorIt
  163. -- global gLockFlag
  164. set userLevel to 5
  165. set cantModify of this stack to false
  166. set cantPeek of this stack to false
  167. lock screen
  168. push card
  169. -- put false into gLockFlag
  170. -- repeat with whichBG = 1 to number of bgs
  171. --   go bg whichBG
  172. --   ToggleAllFields
  173. -- end repeat
  174. -- do some special processing for various backgrounds
  175. -- Glossary Background
  176. go bg "Glossary"
  177. show fld "title"
  178. -- The various "? Commands" backgrounds
  179. go bg "AppleScript‚Ñ¢"
  180. show bkgnd btn "FindDef"
  181. go bg "Application"
  182. show bkgnd btn "FindDef"
  183. go bg "Scripting Additions"
  184. show bkgnd btn "FindDef"
  185. pop card
  186. unlock screen
  187. end AuthorIt
  188.  
  189.  
  190. on ToggleAllFields
  191. global gLockFlag
  192. repeat with whichFld = 1 to number of flds
  193. set lockText of field whichFld to gLockFlag
  194. end repeat
  195. end ToggleAllFields
  196. </script>
  197.     <background id="2695" file="background_2695.xml" name="contents" />
  198.     <background id="3638" file="background_3638.xml" name="About this Stack" />
  199.     <background id="4698" file="background_4698.xml" name="script objects" />
  200.     <background id="5201" file="background_5201.xml" name="Assignments" />
  201.     <background id="6274" file="background_6274.xml" name="Constants" />
  202.     <background id="6817" file="background_6817.xml" name="Control Statements" />
  203.     <background id="7338" file="background_7338.xml" name="Handlers" />
  204.     <background id="7831" file="background_7831.xml" name="Operators" />
  205.     <background id="8225" file="background_8225.xml" name="Reference Forms" />
  206.     <background id="11256" file="background_11256.xml" name="Predefined Variables" />
  207.     <background id="11789" file="background_11789.xml" name="AppleScript‚Ñ¢" />
  208.     <background id="22304" file="background_22304.xml" name="Application" />
  209.     <background id="23529" file="background_23529.xml" name="Scripting Additions" />
  210.     <background id="30644" file="background_30644.xml" name="Glossary" />
  211.     <card id="2891" file="card_2891.xml" marked="false" name="index" owner="2695" />
  212.     <card id="3953" file="card_3953.xml" marked="false" name="" owner="3638" />
  213.     <card id="35430" file="card_35430.xml" marked="false" name="" owner="3638" />
  214.     <card id="40397" file="card_40397.xml" marked="false" name="" owner="3638" />
  215.     <card id="40512" file="card_40512.xml" marked="false" name="" owner="3638" />
  216.     <card id="38839" file="card_38839.xml" marked="false" name="" owner="5201" />
  217.     <card id="54706" file="card_54706.xml" marked="false" name="" owner="5201" />
  218.     <card id="54796" file="card_54796.xml" marked="false" name="" owner="5201" />
  219.     <card id="39229" file="card_39229.xml" marked="false" name="" owner="5201" />
  220.     <card id="39047" file="card_39047.xml" marked="false" name="" owner="5201" />
  221.     <card id="5607" file="card_5607.xml" marked="false" name="" owner="5201" />
  222.     <card id="6033" file="card_6033.xml" marked="false" name="" owner="11789" />
  223.     <card id="12516" file="card_12516.xml" marked="false" name="" owner="11789" />
  224.     <card id="47637" file="card_47637.xml" marked="false" name="" owner="11789" />
  225.     <card id="12547" file="card_12547.xml" marked="false" name="" owner="11789" />
  226.     <card id="13339" file="card_13339.xml" marked="false" name="" owner="11789" />
  227.     <card id="14145" file="card_14145.xml" marked="false" name="" owner="11789" />
  228.     <card id="21770" file="card_21770.xml" marked="false" name="" owner="22304" />
  229.     <card id="49444" file="card_49444.xml" marked="false" name="" owner="22304" />
  230.     <card id="50002" file="card_50002.xml" marked="false" name="" owner="22304" />
  231.     <card id="50420" file="card_50420.xml" marked="false" name="" owner="22304" />
  232.     <card id="50600" file="card_50600.xml" marked="false" name="" owner="22304" />
  233.     <card id="50862" file="card_50862.xml" marked="false" name="" owner="22304" />
  234.     <card id="51118" file="card_51118.xml" marked="false" name="" owner="22304" />
  235.     <card id="51483" file="card_51483.xml" marked="false" name="" owner="22304" />
  236.     <card id="51719" file="card_51719.xml" marked="false" name="" owner="22304" />
  237.     <card id="52116" file="card_52116.xml" marked="false" name="" owner="22304" />
  238.     <card id="52279" file="card_52279.xml" marked="false" name="" owner="22304" />
  239.     <card id="52669" file="card_52669.xml" marked="false" name="" owner="22304" />
  240.     <card id="52940" file="card_52940.xml" marked="false" name="" owner="22304" />
  241.     <card id="53105" file="card_53105.xml" marked="false" name="" owner="22304" />
  242.     <card id="53459" file="card_53459.xml" marked="false" name="" owner="22304" />
  243.     <card id="53746" file="card_53746.xml" marked="false" name="" owner="22304" />
  244.     <card id="53905" file="card_53905.xml" marked="false" name="" owner="22304" />
  245.     <card id="19630" file="card_19630.xml" marked="false" name="Show Example" owner="23529" />
  246.     <card id="23243" file="card_23243.xml" marked="false" name="Hide Example" owner="23529" />
  247.     <card id="24576" file="card_24576.xml" marked="false" name="Hide Example" owner="23529" />
  248.     <card id="24998" file="card_24998.xml" marked="false" name="Hide Example" owner="23529" />
  249.     <card id="25302" file="card_25302.xml" marked="false" name="Hide Example" owner="23529" />
  250.     <card id="25651" file="card_25651.xml" marked="false" name="" owner="23529" />
  251.     <card id="5887" file="card_5887.xml" marked="false" name="" owner="23529" />
  252.     <card id="9498" file="card_9498.xml" marked="false" name="" owner="23529" />
  253.     <card id="26108" file="card_26108.xml" marked="false" name="" owner="23529" />
  254.     <card id="26254" file="card_26254.xml" marked="false" name="" owner="23529" />
  255.     <card id="12913" file="card_12913.xml" marked="false" name="" owner="23529" />
  256.     <card id="26421" file="card_26421.xml" marked="false" name="" owner="23529" />
  257.     <card id="26641" file="card_26641.xml" marked="false" name="" owner="23529" />
  258.     <card id="26890" file="card_26890.xml" marked="false" name="" owner="23529" />
  259.     <card id="27201" file="card_27201.xml" marked="false" name="" owner="23529" />
  260.     <card id="13110" file="card_13110.xml" marked="false" name="" owner="23529" />
  261.     <card id="13637" file="card_13637.xml" marked="false" name="" owner="23529" />
  262.     <card id="27545" file="card_27545.xml" marked="false" name="" owner="23529" />
  263.     <card id="14478" file="card_14478.xml" marked="false" name="" owner="23529" />
  264.     <card id="27671" file="card_27671.xml" marked="false" name="" owner="23529" />
  265.     <card id="28109" file="card_28109.xml" marked="false" name="" owner="23529" />
  266.     <card id="20893" file="card_20893.xml" marked="false" name="" owner="23529" />
  267.     <card id="28376" file="card_28376.xml" marked="false" name="" owner="23529" />
  268.     <card id="28569" file="card_28569.xml" marked="true" name="" owner="23529" />
  269.     <card id="21189" file="card_21189.xml" marked="false" name="" owner="23529" />
  270.     <card id="21352" file="card_21352.xml" marked="false" name="" owner="23529" />
  271.     <card id="21675" file="card_21675.xml" marked="false" name="" owner="23529" />
  272.     <card id="22920" file="card_22920.xml" marked="false" name="" owner="23529" />
  273.     <card id="29123" file="card_29123.xml" marked="false" name="" owner="23529" />
  274.     <card id="29793" file="card_29793.xml" marked="false" name="" owner="23529" />
  275.     <card id="30104" file="card_30104.xml" marked="false" name="" owner="23529" />
  276.     <card id="23979" file="card_23979.xml" marked="false" name="" owner="6274" />
  277.     <card id="24276" file="card_24276.xml" marked="false" name="" owner="6274" />
  278.     <card id="33671" file="card_33671.xml" marked="false" name="" owner="6274" />
  279.     <card id="7011" file="card_7011.xml" marked="false" name="" owner="6817" />
  280.     <card id="13854" file="card_13854.xml" marked="false" name="" owner="6817" />
  281.     <card id="39675" file="card_39675.xml" marked="false" name="" owner="6817" />
  282.     <card id="42733" file="card_42733.xml" marked="false" name="" owner="6817" />
  283.     <card id="6575" file="card_6575.xml" marked="false" name="" owner="6817" />
  284.     <card id="43173" file="card_43173.xml" marked="false" name="" owner="6817" />
  285.     <card id="43279" file="card_43279.xml" marked="false" name="" owner="6817" />
  286.     <card id="44198" file="card_44198.xml" marked="false" name="" owner="6817" />
  287.     <card id="39845" file="card_39845.xml" marked="false" name="" owner="6817" />
  288.     <card id="30286" file="card_30286.xml" marked="false" name="Defs." owner="30644" />
  289.     <card id="32540" file="card_32540.xml" marked="false" name="" owner="30644" />
  290.     <card id="32915" file="card_32915.xml" marked="false" name="" owner="30644" />
  291.     <card id="34225" file="card_34225.xml" marked="false" name="" owner="30644" />
  292.     <card id="35642" file="card_35642.xml" marked="false" name="" owner="30644" />
  293.     <card id="36084" file="card_36084.xml" marked="false" name="" owner="30644" />
  294.     <card id="36205" file="card_36205.xml" marked="false" name="" owner="30644" />
  295.     <card id="36596" file="card_36596.xml" marked="false" name="" owner="30644" />
  296.     <card id="36660" file="card_36660.xml" marked="false" name="" owner="30644" />
  297.     <card id="36926" file="card_36926.xml" marked="false" name="" owner="30644" />
  298.     <card id="37200" file="card_37200.xml" marked="false" name="" owner="30644" />
  299.     <card id="37574" file="card_37574.xml" marked="false" name="" owner="30644" />
  300.     <card id="37680" file="card_37680.xml" marked="false" name="" owner="30644" />
  301.     <card id="38109" file="card_38109.xml" marked="false" name="" owner="30644" />
  302.     <card id="38248" file="card_38248.xml" marked="false" name="" owner="30644" />
  303.     <card id="38573" file="card_38573.xml" marked="false" name="" owner="30644" />
  304.     <card id="40163" file="card_40163.xml" marked="false" name="" owner="30644" />
  305.     <card id="40877" file="card_40877.xml" marked="false" name="" owner="30644" />
  306.     <card id="41014" file="card_41014.xml" marked="false" name="" owner="30644" />
  307.     <card id="42089" file="card_42089.xml" marked="false" name="" owner="30644" />
  308.     <card id="44000" file="card_44000.xml" marked="false" name="" owner="30644" />
  309.     <card id="45423" file="card_45423.xml" marked="false" name="" owner="30644" />
  310.     <card id="7543" file="card_7543.xml" marked="false" name="" owner="7338" />
  311.     <card id="47453" file="card_47453.xml" marked="false" name="" owner="7338" />
  312.     <card id="48006" file="card_48006.xml" marked="false" name="" owner="7338" />
  313.     <card id="48147" file="card_48147.xml" marked="false" name="" owner="7338" />
  314.     <card id="48497" file="card_48497.xml" marked="false" name="" owner="7338" />
  315.     <card id="48669" file="card_48669.xml" marked="false" name="" owner="7338" />
  316.     <card id="48903" file="card_48903.xml" marked="false" name="" owner="7338" />
  317.     <card id="49350" file="card_49350.xml" marked="false" name="" owner="7338" />
  318.     <card id="14724" file="card_14724.xml" marked="false" name="" owner="7831" />
  319.     <card id="15336" file="card_15336.xml" marked="false" name="" owner="7831" />
  320.     <card id="14970" file="card_14970.xml" marked="false" name="" owner="7831" />
  321.     <card id="15402" file="card_15402.xml" marked="false" name="" owner="7831" />
  322.     <card id="16267" file="card_16267.xml" marked="false" name="" owner="7831" />
  323.     <card id="15743" file="card_15743.xml" marked="false" name="" owner="7831" />
  324.     <card id="16059" file="card_16059.xml" marked="false" name="" owner="7831" />
  325.     <card id="18075" file="card_18075.xml" marked="false" name="" owner="7831" />
  326.     <card id="28884" file="card_28884.xml" marked="false" name="" owner="7831" />
  327.     <card id="20278" file="card_20278.xml" marked="false" name="" owner="7831" />
  328.     <card id="19909" file="card_19909.xml" marked="false" name="" owner="7831" />
  329.     <card id="18288" file="card_18288.xml" marked="false" name="" owner="7831" />
  330.     <card id="23673" file="card_23673.xml" marked="false" name="" owner="7831" />
  331.     <card id="19205" file="card_19205.xml" marked="false" name="" owner="7831" />
  332.     <card id="22181" file="card_22181.xml" marked="false" name="" owner="7831" />
  333.     <card id="19014" file="card_19014.xml" marked="false" name="" owner="7831" />
  334.     <card id="16619" file="card_16619.xml" marked="false" name="" owner="7831" />
  335.     <card id="16772" file="card_16772.xml" marked="false" name="" owner="7831" />
  336.     <card id="17083" file="card_17083.xml" marked="false" name="" owner="7831" />
  337.     <card id="17180" file="card_17180.xml" marked="false" name="" owner="7831" />
  338.     <card id="17552" file="card_17552.xml" marked="false" name="" owner="7831" />
  339.     <card id="17804" file="card_17804.xml" marked="false" name="" owner="7831" />
  340.     <card id="8052" file="card_8052.xml" marked="false" name="" owner="7831" />
  341.     <card id="18886" file="card_18886.xml" marked="false" name="" owner="7831" />
  342.     <card id="35123" file="card_35123.xml" marked="false" name="" owner="7831" />
  343.     <card id="31163" file="card_31163.xml" marked="false" name="" owner="11256" />
  344.     <card id="42464" file="card_42464.xml" marked="false" name="" owner="11256" />
  345.     <card id="41486" file="card_41486.xml" marked="false" name="" owner="11256" />
  346.     <card id="31421" file="card_31421.xml" marked="false" name="" owner="11256" />
  347.     <card id="43729" file="card_43729.xml" marked="false" name="" owner="11256" />
  348.     <card id="42944" file="card_42944.xml" marked="false" name="" owner="11256" />
  349.     <card id="32292" file="card_32292.xml" marked="false" name="" owner="11256" />
  350.     <card id="11369" file="card_11369.xml" marked="false" name="" owner="11256" />
  351.     <card id="32094" file="card_32094.xml" marked="false" name="" owner="11256" />
  352.     <card id="31905" file="card_31905.xml" marked="false" name="" owner="11256" />
  353.     <card id="31586" file="card_31586.xml" marked="false" name="" owner="11256" />
  354.     <card id="44526" file="card_44526.xml" marked="false" name="" owner="11256" />
  355.     <card id="8591" file="card_8591.xml" marked="false" name="" owner="8225" />
  356.     <card id="29237" file="card_29237.xml" marked="false" name="" owner="8225" />
  357.     <card id="29605" file="card_29605.xml" marked="false" name="" owner="8225" />
  358.     <card id="41314" file="card_41314.xml" marked="false" name="" owner="8225" />
  359.     <card id="44667" file="card_44667.xml" marked="false" name="" owner="8225" />
  360.     <card id="33261" file="card_33261.xml" marked="false" name="" owner="8225" />
  361.     <card id="33325" file="card_33325.xml" marked="false" name="" owner="8225" />
  362.     <card id="34043" file="card_34043.xml" marked="false" name="" owner="8225" />
  363.     <card id="34516" file="card_34516.xml" marked="false" name="" owner="8225" />
  364.     <card id="34649" file="card_34649.xml" marked="false" name="" owner="8225" />
  365.     <card id="41809" file="card_41809.xml" marked="false" name="" owner="8225" />
  366.     <card id="4927" file="card_4927.xml" marked="false" name="" owner="4698" />
  367.     <card id="49771" file="card_49771.xml" marked="false" name="" owner="4698" />
  368. </stack>
  369.